home *** CD-ROM | disk | FTP | other *** search
/ Mastering Public Speaking / Mastering Public Speaking.iso / pc / Click Here.exe / Click Here.dxr / Rate (2)_10_save.ls < prev    next >
Encoding:
Text File  |  2003-05-13  |  3.2 KB  |  34 lines

  1. global varFilePath, varRateQuestionList, gRQ1, gRQ2, gRQ3, gRQ4, gRQ5, gRQ6, gRQ7, gRQ8, gRQ9, gRQ10, gRQ11, gRQ12, gRQ13, gRQ14, gRQ15, gRQ16, gRQ17, gRQ18, gRQ19, gRQ20, gRQ21, gRQ22, gRQ23, gRQ24, gRQ25, gRQ26, gRQ27, gRQ28, gRQ29, gRQ30, gRQ31, gRQ32, gRQ33, gRQ34, gRQ35, gRQ36, gRQ37, gRQ38, gRQ39, gRQ40, gRQ41, gRQ42, gRQ43, varMakeQuestionList, gMQ1, gMQ2, gMQ3, gMQ4, gMQ5, gMQ6, gMQ7, gMQ8, gMQ9, gMQ10, gMQ11, gMQ12, gMQ13, gMQ14, gMQ15, gMQ16, gMQ17, gMQ18, gMQ19, gMQ20, gMQ21, gMQ22, gMQ23, gMQ24, gMQ25, gMQ26, gMQ27, gMQ28, gMQ29, gMQ30, gMQ31, gMQ32, gMQ33, gMQ34, gMQ35, gMQ36, gMQ37, gMQ38, gMQ39, gMQ40, gMQ41, gMQ42, gMQ43, gMQ44, gMQ45, gMQ46, gMQ47, gMQ48, gMQ49, gMQ50, gMQ51, gMQ52, gMQ53, gMQ54, gMQ55, gMQ56, gMQ57, gMQ58, gMQ59, gMQ60, gMQ61, gMQ62, gMQ63, gMQ64, gMQ65, gMQ66, gMQ67, gMQ68, gMQ69, gMQ70, gMQ71, gMQ72, gMQ73, gMQ74, gMQ75, gMQ76, gMQ77, gMQ78, gMQ79, gMQ80, gMQ81, gMQ82, gMQ83, gMQ84, gMQ85, gMQ86, gMQ87, gMQ88, gMQ89, gMQ90, gMQ91, gMQ92, gMQ93, gMQ94, gMQ95, gMQ96, gMQ97, gMQ98, gMQ99, gMQ100, gMQ101, gMQ102, gMQ103, gMQ104, gMQ105, gMQ106, gMQ107, gMQ018, gMQ109, gMQ110, gMQ111, gMQ112, gMQ113
  2.  
  3. on mouseDown
  4.   fileIOobject = new(xtra("fileIO"))
  5.   fileIOobject.openFile(varFilePath, 0)
  6.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  7.   fileIOobject.writeString(RETURN & "*                     CRITIQUE                     *" & RETURN)
  8.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  9.   i = 1
  10.   repeat while i <= count(varRateQuestionList)
  11.     tempRateList = getAt(varRateQuestionList, i)
  12.     fileIOobject.writeString(RETURN & getAt(tempRateList, 1) & RETURN & RETURN & member(getAt(tempRateList, 2)).text & RETURN & RETURN & "---" & RETURN)
  13.     i = 1 + i
  14.   end repeat
  15.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  16.   fileIOobject.writeString(RETURN & "*                         PLAN                     *" & RETURN)
  17.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  18.   i = 1
  19.   repeat while i <= count(varMakeQuestionList)
  20.     tempMakeList = getAt(varMakeQuestionList, i)
  21.     fileIOobject.writeString(RETURN & getAt(tempMakeList, 1) & RETURN & RETURN & member(getAt(tempMakeList, 2)).text & RETURN & RETURN & "---" & RETURN)
  22.     i = 1 + i
  23.   end repeat
  24.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  25.   fileIOobject.writeString(RETURN & "*                        LEARN                     *" & RETURN)
  26.   fileIOobject.writeString(RETURN & "****************************************************" & RETURN)
  27.   fileIOobject.writeString(RETURN & "Taken from Speech 1." & RETURN & RETURN & member("taketxtfld").text & RETURN & RETURN & "---" & RETURN)
  28.   fileIOobject.writeString(RETURN & "Taken from Speech 2." & RETURN & RETURN & member("taketxtfld2").text & RETURN & RETURN & "---" & RETURN)
  29.   fileIOobject.writeString(RETURN & "Taken from Speech 3." & RETURN & RETURN & member("taketxtfld3").text & RETURN & RETURN & "---" & RETURN)
  30.   alert("Answers Saved to file " & string(varFilePath))
  31.   fileIOobject.closeFile()
  32.   fileIOobject = VOID
  33. end
  34.